home *** CD-ROM | disk | FTP | other *** search
/ CD Classic 39 / CD CLASSIC #39 (1998).iso / EMPRESA / FACTPLUS / DISCO7 / ALBAFAX.XT_ / ALBAFAX.bin
Text File  |  1997-11-14  |  5KB  |  165 lines
  1. <HTML>
  2. <TITLE><<TituloPagina()>></TITLE>
  3. <HEAD>
  4. <META HTTP-EQUIV="Expires" CONTENT="Mon, 06 Jan 1990 00:00:01 GMT">
  5. </HEAD>
  6. <SCRIPT>
  7. var nFilas
  8. var aPrecios
  9.  
  10. function Empresas()
  11. {
  12.    var cEmpresa = Get( "EMPRESA" )
  13.    Erase()
  14.    location.href = "/dbf" + cEmpresa + "/www/empresa.htm?" + cEmpresa
  15. }
  16.  
  17. function CentroSP()
  18. {
  19.    Erase()
  20.    parent.location.href = "http://www.escaparates.com"
  21. }
  22.  
  23. <<Java_Array()>>
  24. <<Java_Chr()>>
  25. <<Java_Str()>>
  26. <<Java_Trim()>>
  27. <<Java_TrForm()>>
  28. <<Java_VerArticulo()>>
  29.  
  30. function Recalcula() // Recalcula los valores
  31. {
  32.    var n, nTotal = 0, nLinea = 0, nUds = 0, nUds2 = ""
  33.    for( n = 1; n <= nFilas; n++ )
  34.    {
  35.       nUds2  = eval( "document.PEDIDO.UNIDAD" + Str( n ) + ".value" )
  36.       nUds   = parseInt( nUds2 )
  37.       nLinea = aPrecios[ n ] * nUds
  38.       nTotal += nLinea
  39.       eval( "document.PEDIDO.TOTAL" + Str( n ) + ".value=" + '"' + Transform( Str( nLinea ) ) + '"' )
  40.       eval( "document.PEDIDO.UNIDAD" + Str( n ) + ".value=" + '"' + Str( nUds ) + '"' )
  41.     }
  42.    document.PEDIDO.GTOTAL.value = Transform( Str( nTotal ) )
  43. }
  44.  
  45. </SCRIPT>
  46. <<SetPedido( .F. )>>
  47. </SCRIPT>
  48. <BODY BGCOLOR="#FFFFFF">
  49. <CENTER>
  50. <TABLE VALING="TOP" ALIGN="CENTER">
  51. <TR>
  52.   <TD VALING="top">
  53.           <CENTER>
  54.           << LOGO() >><br>
  55.           <H3><FONT COLOR="#000000"><<NomEmp( Parameters )>></FONT></H3>
  56.           <FONT FACE="ARIAL" SIZE="1" COLOR="#111111"><<Direccion( Parameters )>></FONT>
  57.           </CENTER>
  58.  
  59.   </TD>
  60.  
  61.   <TD WIDTH="300" VALING="top">
  62.   </TD>
  63.  
  64.   <TD><P><FONT SIZE="2" COLOR="#000000">
  65.  
  66.        <TABLE>
  67.          <TR>
  68.             <TD ALING="RIGHT">NIF/CIF:
  69.             </TD>
  70.                <INPUT TYPE"TEXT" SIZE=35 MAXLENGTH=35"><BR>
  71.             <TD>
  72.          </TR>
  73.          <TR>
  74.             <TD ALING="RIGHT">Nombre:
  75.             </TD>
  76.                <INPUT TYPE"TEXT" SIZE=35 MAXLENGTH=35"><BR>
  77.             <TD>
  78.          </TR>
  79.          <TR>
  80.             <TD ALING="RIGHT">Empresa:
  81.             </TD>
  82.                <INPUT TYPE"TEXT" SIZE=35 MAXLENGTH=35"><BR>
  83.             <TD>
  84.          </TR>
  85.          <TR>
  86.             <TD ALING="RIGHT">Dirección
  87.             </TD>
  88.                <INPUT TYPE"TEXT" SIZE=35 MAXLENGTH=35"><BR>
  89.             <TD>
  90.          </TR>
  91.          <TR>
  92.             <TD ALING="RIGHT">Población:
  93.             </TD>
  94.                <INPUT TYPE"TEXT" SIZE=25 MAXLENGTH=25"><BR>
  95.             <TD>
  96.          </TR>
  97.          <TR>
  98.             <TD ALING="RIGHT">Código Postal:
  99.             </TD>
  100.                <INPUT TYPE"TEXT" SIZE=5 MAXLENGTH=5"><BR>
  101.             <TD>
  102.          </TR>
  103.          <TR>
  104.             <TD ALING="RIGHT">Teléfono:
  105.             </TD>
  106.                <INPUT TYPE"TEXT" SIZE=12 MAXLENGTH=12"><BR>
  107.             <TD>
  108.          </TR>
  109.          <TR>
  110.             <TD ALING="RIGHT">Fax:
  111.             </TD>
  112.                <INPUT TYPE"TEXT" SIZE=12 MAXLENGTH=12"><BR>
  113.             <TD>
  114.          </TR>
  115.          <TR>
  116.             <TD ALING="RIGHT">e-Mail:
  117.             </TD>
  118.                <INPUT TYPE"TEXT" SIZE=50 MAXLENGTH=50"><BR>
  119.             <TD>
  120.          </TR>
  121.  
  122.        </TABLE>
  123.        </P>
  124.       <BR><FONT SIZE="2"><B>Fecha:<<Fecha()>></B></FONT>
  125.   </TD>
  126. </TR>
  127. </TABLE>
  128. </CENTER>
  129. <BR><BR><BR>
  130. <CENTER><H2>Solicitud de Pedido</H2></CENTER>
  131. <FORM NAME="PEDIDO">
  132. <<CartaAlbaran( "#000080", "#FFFFFF", "#99ccff", "#000000", "#ccffff", "#000000", "#000090", "#AFFFFF", .F.)>>
  133. </FORM>
  134. <BR><BR>
  135.  
  136. <SCRIPT>
  137. alert( 'Ahora podrß variar las unidades pedidas de cada artφculo. Cuando finalize pulse ENVIAR para enviar el pedido. Si desea obtener una copia impresa de este pedido, seleccione Imprimir en el men· de su navegador')
  138. </SCRIPT>
  139. <BR>
  140. <TABLE BORDER="1">
  141.       <TR><TD>
  142.               <B><FONT COLOR="#000000">Tipo de Tarjeta de CrΘdito:</FONT></B>
  143.               <INPUT TYPE="TEXT" NAME="Tipo"><BR><BR>
  144.               <B><FONT COLOR="#000000">Titular:</FONT></B>
  145.               <INPUT TYPE="TEXT" NAME="TITULAR" SIZE=40 MAXLENGTH=40><BR><BR>
  146.  
  147.               <B><FONT COLOR="#000000">Numeraci≤n:</FONT></B>
  148.               <INPUT TYPE="TEXT" NAME="Grupo1" SIZE=4 MAXLENGTH=4>
  149.               <INPUT TYPE="TEXT" NAME="Grupo2" SIZE=4 MAXLENGTH=4>
  150.               <INPUT TYPE="TEXT" NAME="Grupo3" SIZE=4 MAXLENGTH=4>
  151.               <INPUT TYPE="TEXT" NAME="Grupo4" SIZE=4 MAXLENGTH=4>
  152.  
  153.               <B><FONT COLOR="#000000">Fecha de vencimiento:</FONT></B>
  154.               <INPUT TYPE="TEXT" NAME="Vencimiento" SIZE=5 MAXLENGTH=5><BR>
  155.  
  156.           </TD>
  157.           <TD>
  158.             <CENTER><H2>Forma de Pago: </H2><H3><<Pagosfax()>></H3></CENTER>
  159.           </TD>
  160.              </TR>
  161. </TABLE>
  162. <A HREF="JavaScript:CentroSP()">Centro Comercial SP</A>
  163. <A HREF="JavaScript:Empresas()">Pßgina inicial de esta Tienda</A><BR><BR>
  164. </BODY>
  165. </HTML>